home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 87xx / 8709a.d64 / buntes bild (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  211b  |  12 lines
  1. 10 REM BUNTER BILDSCHIRM
  2. 20 REM
  3. 30 REM BILDSCHIRM MIT EINEM ZEICHEN FUELLEN
  4. 40 FORX=1024TO2023
  5. 60 POKEX,207:NEXT
  6. 70 REM FARBEN AENDERN
  7. 80 FA=INT(RND(TI)*16)
  8. 90 S=0.8+RND(TI)*6
  9. 100 FOR X=55296 TO 56296 STEP S
  10. 110 POKEX,FA:NEXT
  11. 120 GOTO80
  12.